/*
chars
parse a a
parse aa aa
parse aaaaa aaaaa
noparse aabaa 'P, or end-of-input' 3
*/

# Type char * with call and ref_str macro:

P :: char * <- A P { ref_str() } / ε { 0 }
A :: void <- "a"
